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Below are a number of notes regarding useful information 
referring to the PET computer in use. At tlie end of this 
bulletin are a number of programs, a comparison between BASIC 
and lORTEAH and a user's report. 



Operating System Bui^s : 

Some of the bugs tbat people have written about: 

1. Array addresses are calculated modulo 256(0-255 size limit). 

2. SPC(O) results in SPC(256). 

5. RIGHTS|(A|,0) causes ILLEGAL QUAMITI error message. 
4. EIID(O) gives the same number each time it is called, not the 
same sequence. 

EHD for negative arguments does strange things —i.e. 
-.01, -.02,--. 04-, -.08, -.16, etc. all return the same number. 



Hardware available : 

Convenience Living Sjstems, 64S Sheraton Drive, Sunnyvale, 
GA 94-087 EXEAIDAPET for 1435 assembled with 16K RAM, sockets 
for 4K EPROM, 2 parallel 1/0 ports with handshake, slots for 3 
option cards, and all cables and brackets. 

lore though Products, Box 8066, Coburg, OR 97^01. The 
PETSI PET to S-100 interface/motherboard. 1105 kit or 1160 
assembled. Includes 4 slots, dynamic memory controller, and 
sockets for 8K 2716 EPROM. 
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The Net Works, 5014 larragansett #6, San Diego, CA 9210? 
has an IEEE to ES-232 board (witli dual ports) for |160 assembled 
and tested including on board power supplies. Tliey also announced 
their TlW-488 Low Speed Modem Module to interface IEEE-4B8 (PET 
connector version) to the telephone network using the BELL 103A 
standard. Doug Gage, one of Tl¥'s proprietors sent preliminary 
announcement specs and some documentation. He also said they had 
a prototype running for some time, and are now producing the 
first units at $225 assembled. 



The 8 bit user port is actually part of an MOS' Technology MCS 
6522 Yersatile xnterface Adapter (¥IA). Xou can get a copy of 
the ¥11 data sheet from Commodore Business Machines, 5370 Pharmacy 
Avenue, Agincourt, Ont. (416) 499-4292. Most of the ¥IA«s features 
apparently are used for the PET itself, leaving only an 8 bit 
port and two handshake lines, which are really quite simple to use. 



The new PET user manual briefly describes the 8 bit port 
edge connector, pins A and B are grounded, pin B is CAl, the 
input handshake line, pin M is CB2, the output handshake line, 
and pins C through L are the 8 data lines, with C being the high 
order (leftmost) and L the low order bit. When the PET is turned 
on, the 8 data bits are programmed to act as inputs and CAl is 
programmed to recognize a negative transition (from 1 to O). 

To generate an audio signal from the PET a programmable 
square wave generator is included in the MCS6522 which interfaces 
the PET Parallel User Port. When the tape drive is not in 
operation, the generator can be used to produce one of 514 
different frequencies between 243HZ and 125EHZ on CB2 (User Port 
pin M) . The 6522 makes this possible by recirculating shift 
register intended for serial data input and output. With a 
square wave pattern loaded into the shift register and the control 
set for free running output under timer controlled rate, a 
continuous square wave is produced on CB2. 
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TJae BASIC statements needed to control the output are 
as follows: 

POKE 594-67,16 Sets shift register to free running output mode. 

POKE 59464,0 Sets sliift rate. C is an integer of to 255« 

POKE 59466, D Loads sliift register. D should be 15, 51, or 

85 for a square wave output. 

The frequency of tlie square wave can be determined from 
the following equation: 

IBEQDEICT = 500000 HZ ¥here:Bl = 8 for B= 15 
tc+27rDl) Dl = 4 for B= 51 

Dl = 2 for D= 85 

Reading or writing the shift register must he done last as 
this initiates the shifting operation. The control register at 
59467 must be reloaded with for the tape drive to write correctly. 

Do not connect a speaker or earphones directly to the CB2 
output of the PET. An amplifier is necessary to isolate the 6522 
from inductive loads. 

The TAPE #2 HEAD signal on User Port pin 8 (TAPE #2 HEAD and 
TAPE WHITE are reversed in the introductoi^ manual) appears to be 
the CBl line from the 6522 and carries the shift clock signal. 
With both CBl and CB2 available, it may be possible to use the 
I/O port expansion s.cheme described in the MCS6522 Data Sheet. 

PET CODES ; 

There are two ways to write to the screen of your PET: 
either POEEing screen memory (32768-33767) or by PBJHTing. Besides 
this, there are two ways in which memory is interpreted by the 
character generator: standard mode (location 59^68 = binaiy 
XXXXllOX) or lower case mode (location ^XXXXllOX) . Some of this 
confusion may be simplified with a character code chart. In the 
chart the OPP and R¥S columns refer to values POlEed in screen 
memoiy whereas CHRP refers to the PHIHT statement. Thus, either 
POKE 32768, 129 or PRIM CH1^(18) CHRf(65) will show a reverse A. 

, This simple program: 10 IIPUT M,1:PEI1T M;1,"AA"CHE|(M) 
CHE|(N)"BB":GOTO 10 allows you to explore the full CHE| set 
including cursor and reverse. The chart gives GHE| codes from 
(0-95) and (128-223). The missing values in the chart have the 
equivalents: (96-127) = (52-63), (224^25^) = (160-190), and 255 = 222. 

By referring to an ASCII code chart we' see that ASCII 
(0-95) = PET(0-95) httt that ASCll(96™127) = PET(192™225) , ie. 
displaced by 96. 
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The printing mode (standard or lower case) is set hj 
POKEing an address. So as not to disturb any of the other bits 
in the peripheral control register a safe way to set the lower 
case mode would be: POKE 59468, PEEK( 59468) OR 14 and reset it to 
standard mode with K)KE 59468, PEffi( 59468) AID 255 OR 12. 

Standard Mode: Location 59468 = HXXllOX 
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Software available from Home Computer Centre, 6101 Xonge 
Street, Willowdale, Ontario, M2M 3¥2, telephone (416)222-1166. 

Music 

Play music on your PET, includes "DIXIE" on the program 
or you can compose your own music and replay it again and again, 
112.00. 

Entiy 

formatted key entry program for business application; use 
cassette, memoi^, or external or uirtual combination of them as 
storage. Can also be used for media conversion. 112.00. 

Day/Timer 

Display analog clock on your PET, AM/PM change backgrotand, 
set alarm and appointments, message for appointment, also instant 
time response from all over the world. il2.00. 

Monitor 

Include memoiy dump in hex, octal, decimal and disassembler 
on ALL 01 PET MEMOET IDCATIOl. Machine language loading and 
modification from cassette tape or keyboard. 120.00, 

Graph 

Generate more than 30 different graphic patterns on the 
PET display, with precise time control. Controls are from keyboard 
or from the cassette data. $12.00, 



If PEIlTing to cassette file, you. can use more than one 
variable in a PEINT# by including "," between variables: 
PE[NT#1,1%"X|« 

Workbooks : 

Workbooks available from: Total Infonaation Services 
P.O. Box 921, Los Alamos, IM 87544. 

Getting Started 14.00 USB 
Strings and Arrays 5-95 " 
Graphics 4.95 " 
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Number to Keyboard Conversion 



0: End of line 

1-31: unused 

32: space 

33: ! 

34: " 

35: ' 

36: $ 

37: % 

38: & 

39: ' 

40: ( 

41: ) 

42: * 

43: + 

44: , 

45: - 

46: . 

47:/ 

48: 

49: 1 

50: 2 

5!: 3 

52: 4 

53: 5 

54: 6 

55: 7 

56: 8 

57: 9 

58: : 

59: ; 

60: < 

61: = 

62: > 

63: ? 

64: @ 

65: A 

66: B 

67: C 

68: D 

69; E 

70: F 

71: G 

72: H 

73: I 

74: J 

75: K 

76: L 

77: M 

78: N 

79: O 

80: P 

81: Q 

82: R 

83: S 

84: T 

85: U 

86: V 

87: W 

88: X 



89: Y 
90: Z 

91:1 

92: \ 

93:1 

94: f 

95:*- 

96: space 

97: I 

98: " 

99: ' 

100: $ 

101: % 

102: & 

103: ' 

104: ( 

105: ) 

106: * 

107: + 

108: , 

109: - 

110: . 

Ill:/ 

112: 

113: 1 

114: 2 

115: 3 

116: 4 

117: 5 

118: 6 

119: 7 

120: 8 

121: 9 

122: : 

123: I 

124: < 

125: = 

126: > 

127: ? 

128: END 

129: FOR 

130: NEXT 

131: DATA 

132: INPUT' 

133: INRJT 

134: DIM 

135: READ 

136: LET 

137: GOTO 

138: RUN 

139: IF 

140: RESTORE 

14!: GOSUB 

142: RETURN 

143: REM 

144: STOP 

145: ON 

146: WAIT 

147: LOAD 



148: SAVE 
149: VERIFY 
150: DEF 
151: POKE 
152: PRINT' 
153: PRINT 
154: CONT 
155: LIST 
156: CLR 
157: CMD 
158: SYS 
159: OPEN 
160; CLOSE 
161: GIT 
162: NEW 
163: TABC 
164: TO 
165: FN 
166: SPC( 
167: THEN 
168: NOT 
169: STEP 
170: + 
171: - 
172: * 
173: / 
174: t 
175: AND 
176: OR 
177: > 
178: = 
179: < 
180: SGN 
181: INT 
182: ABS 
183: USR 
184: FRE 
185: POS 
186: SQR 
187: RNO 
188: LOG 
189: EXP 
IW: COS 
191: SIN 
192: TAN 
193: ATN 
194: PEEK 
195: LEN 
196: STRS 
197: VAL 
198: ASC 
199: CHRS 
2W: LEFTS 
201: RIGHTS 
202: MIDS 
203-254: unused 
255: » 



USIMG THE P5f GOMHJTEH 



Note:- 'fords in a rectangle indicate a key to be pressed on the 
PIT keyboard, capitals ar« indiTidual letters to be typed. 



To enter and run a prograa 



1, Typ« IE# then RETURN 



3. 



This will clear out anj old programs 
in the useable memory. 
Now tjpe the program Ittttr by letter #n the keyboard, it will 
go into iiie«oi^ and also appeax on tli« screen. At the end of 
each line you must preaa f^SjMl . 

After yom have typed the entire progran correctly you are ready 
to run it. Type RUl then press KEfURMj and the program will 
start to operate. 



To sorrect errors 

1^ The flashing cursor tells you. where the next letter will go. 



]lfe0R 



once for each 



CUMOR 



(a) to move the cursor to the right press 
apace. 

(b) to move^ the cursor to the left hold fSMIFf ( down and press 
once for each space. 

once for each line* 



(c) to move the cursor down pr«s3 



CUffiOl 



CURSOR 



(d) to moFe the cursor up hold |SHlfT| down and press 
once for each line, 

2» To change an inatruction or part of one, move the cursor to the 
last correct part of the instrttction and then type the correct 
part on top of the incorrect characters, to the end of that linet 
Be sure to pmt spaces on top of any letters left after the correct- 
ion is made, press 



RETURN at the end. 



5» To delete characters. Move the cursor to rigiit of last 
character you wish to delet* then pre«8 



ngxi 
DSi 



Thia remoTea 



the character it is orer and moves everything after it left one 
apace. 

To insert characters. Move the cursor until it is located #here 



the insertion is needed, then hold | SHIFT j down, press 

followed by the character you wish to insert, lou need to hold 



iriST 
BEL 



fSHIFf j down, and press PS? f'or each letter yom insert 



To load a program from tape 

1. Place the caaette in the recorder but do not press any buttons 
on the tape recorder. 

2. Type WM) followei by the name of the prograa, if no name ia tjped 
it will load th© next prograa on tape. 

3« ^Mhen the computer ia readj it will ask jou to press the plaj 
button on th« tape recorier. 

4« If th« tape loads correctly th« compttterwill 

then start to run, the program* If there is just a reaiy indicatioa 
you may have to type HOT. If there ia an error in loading from 
tape, rewind the tape and start the loading instructions over* 

Information on the screen 

1. You may clear the soreen and aeni the cursor to the upper left 
corner by holding down | SHIFT l and pressing 



HOME 



2. If you wish to get a liating of the program in memory at any 
time typ© HST then J^OTmI . 

3. 'then the screen ia full the first lines get lost at the top and 
new lines contiauc to be aided at the bottom. If this happens 
during the listing of a program and you w ish to exa mine some 
steps Isefore they go off the top pressing 



EDN/STOP will stop the 



listing* Actually pressing fEOT^JoP at any time stops the computer 



and if during the operation of your program it will tell you at 
what step yom a toped it. 



Tffif FOE A PRIME MUMBKM (BAdIG) 
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PMMT 


"TYPE 


A «rtiOl£ NUMBIH" 


20 


IMHJf 


A 
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If A = 


» GO 


fO 999 


40 


IF A = 


= 1 SO 


TO 200 


50 


IP A = 


: 2 GO 


TO 220 


60 


B = 2 






70 


G » 1/2 




30 


D = A/B 




90 


S = IfffCD) 




95 


P = -B*E 




100 


IP P = 


: k GO 


TO 240 


110 


IP B > C GO 


TO 260 


120 


B = B 


♦ 1 




130 


GO TO 


80 




200 
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•• 1 IS 
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210 


GO f 


10 




220 


PRIMf 


" 2 12 
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250 


SO TO 


10 
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PaiMf 


A " IS 


I MOT A PlIME" 


250 


GO fO 


10 




260 


PRINf 


A •• IS 


» k PEIMK" 


270 


GO TO 


10 




999 


EH 







TO SORT UP TO 20 WJkBfcJta IMTU A3CEWDIMG OHDE& 

10 DIM M20) 

20 PHIW? "riOf MAMY NUMBIHS TO 30KJ»» 

30 IlPUf 1 

40 IP 1 = GO TO 230 

50 PHINT " GI¥E ME" M " NUmBEBS" 

60 FOR K = 1 TO M 

70 IlHJf A(I) 

80 MiXT 1 

90 J = 1 - 1 

100 FOR M = 1 f J 

110 FOR I = 1 TO J 

120 IP A(I) < ACl+1) GO fO 160 

150 B = A(I*1) 

140 A(I*1) = A(I) 

150 A(I) = B 

160 NEXT I 

170 MEH M 

im PfilMf ••THE IIUMBEI6 IM A.JGEIOING OEDEfi" 

190 POE K = 1 TO N 

200 PRINT A(K) 

210 MKIT I 

220 GO TO ZO 

230 PHIIT "PUIS" 

240 BID 



TABK OP SQUAlffi, GUBES^ fiOOTS 



10 


PHOT " TYPE A STARTING MUMBffl" 


20 


IMPD-f k 


30 


FfilMT '• fYFE THK E.DIHG MM3EE" 


40 


IIIPUT a 




, ■- ■"— ™°"^™™««™™| 


50 


™^« " m^ 1 S i " 


60 


PBT.CT "I SQUARE GIBE 


70 


PUR 1 « A TO B 


80 


G = Mf2 


90 


C = IIIT(C) 



BiiOT" 



100 B = ilf3 
110 D = INT(^) 
120 E = 3QRCM} 
130 PKin M; 
140 PRIST TAB(6)jCj 
150 PHINf TaB(16)|D; 
160 PRINT T-iB(26);E 
170 :*EXT I 
999 EM!) 
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In General 

BASIC is an interpreter, 
interpreting and executing 
each statement as it comes 
to it. 

Statementa 



All statements lauat be 
ntamberei in BASIC aa it 
executes them in numerical 
order. 

Const ants ani ?ari.ables 

All Constanta and Tariablea 
are real until you us© the 
Integer function 
A = INT(B) truncates the 

value of B and put a it 

iB A. 
Can get garbage in 9th digit 



Arithmetic 



At2 



BASIC uses 412 for A' 
Decisions 



BASIC I? is a logical if 
e*g, IP A • B 

IP A < B 

IF k y -B etc 



FOWmN is a compiler and makes 
two compiling passia Bmtete it 
attempts to execute. 



Only atatementa to which yom 
transfer may be nuaiber«d and 
Bust be numbered, numerical 
order means nothing. 



Has both integer ani real 
arithmetic and variable nair.ea. 
Llust be careful of mixed mode. 
Raa double precision for extra 
accuracy. 



POIKBAI uses A * 2 for A* 



POfflHM is a logical if 
e.g. If(A-B) 23,4 



liooping 
BASIC. 



FOR 1= 1 f 20 



■pOfflEM BO 10 1= 1, 20 



JfEXT I 



GOMfllUE 



Input 



IIIHJf A,B at^pe calculating 
and waits for two numbera to 
b« typed on keyboard and 
return button to be pushed 

BEAD A,B takes information 
from a BAfA statement in j«, 
sequence 



HEM)(8,2)A,B 

2 POBMAT (2P8,2) 



for card read 



Some -reraions of FQKBAM have 
simpler unformated rends* 



Output 

FEim A,B,C prints values 
at 10,20,30,40 

PHIM! A|B|G prints 5 spaces 
apart 

PHIlf ••HEIiM'» prints charaotera 
in q.uat«8 

BASIC also has TAB and signals 
at the end of the statement 
for more detailed spacing 

Subacripta 

Bimenaion is MM A(n) 

Can have up to 4 subacripta 
in PET BASIC and 256 limxt to 
their size. 



'tHITE(3,5)A^B,C 
5 POm^(lX,3?15.2) format ia 
more complicated but allowa 
for great flexibility 

Some POET MIS have an output 
much like BASIC. 



Most FOHTBAIS onlj allow triple 
subacripta. Dimension statement 
ia BIHElSIOl 



Subroutines 

G05UB L in B^IC 
:«u3t fciow the statement number 
of the routine, and be au.r« 
yom uae the «am« names of 
variables to commmicate with 
a aiitoroutine aM gubroutln© 
maj destroy your variables if 
you uae the same name» 

Comment a 

""lOT^^llowed by printing ia 
not executed bj the prograaif 
only used to help the reader 
and programmer tell what ia 
taking place in the program 



CAM* IAME(a,b,c...) in P0BTH4I 
Linkage is through the calling 
sequence and the subroutine is 
compiled at a different time, hence 
the actual variable name ia not 
slgnlficaat. Better for large 
programs^ 



C. GOHlE'lf followed by printing is 
not executed by the program, only 
to give notes to those who read 
the program. 



Les Palenik 

25 Silversprings Blvd. 

Apt. 512 

Scarborougli, Ontario MIY 1M9 

Tel. (416)292-6559 



USEE'S BEK)ET ON COWIODOEE PET-2001-8K 



Actually it took me a long time to decide wMch. micro- 
computer to order. I thiiik: I was not alone with this problem, 
because the number of available microcomputers on the market 
is really incredible and each one has different features and 
different price tag. 

Then in June 1977, I went to HOC in Dallas, and saw the 
PET. Before-,' I was thinking about a microcomputer kit, but 
after seeing PET, I immediately decided to place the order right 
at NCC for this assembled and ready- to-run unit. It had 
e¥erything I needed: CMS, cassette drive, keyboard and MOS-6502 
microprocessor with enough memory in one unit, quite powerful 
BASIC in ROM and the price was right. 

In general, I am quite pleased with the performance of 
the PET. I like the compactness of the PET, because I don't 
have too much space in my apartment, and as a matter of fact, 
my Computer Centre is located right in one corner of my kitchen. 
I don't have to say that I spend more time in the kitchen doing 
programming than cooking. 

I found the COMfODOEE BASIC quite powerful and pretty fast. 
It is one of the fastest versions of BASIC available on the 
microcomputer market today and considering that it occupies 
gust over 8E bytes, its instruction set is more than adequate. 

When I placed the order I was promised 90 days delivery 
date. COMMOBOiffi immediately cashed mj cheque for 1795 j hut was 
unable to deliver it for 5 months. Only after contacting 
Mr. Webb from Canadian branch of COMMODOEE, who personally took 
the matter in his hands, I was able to pick up the PET at the 
International Toronto Airport within a week. 
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The PET arrived with, ttie case damaged and without aiij 
manual, or demonstration cassette, but after waiting for five 
months who would care about such things. The COMMODOIE here could 
not help, as they were not ^selling the machines here yet, and 
by sending it to California I x^ould have to wait another 8 weeks 
for repair + the transportation. 

Sometime in November I sent BUG-report to COMMODOEE, 
Palo Alto and until today I haven't received any reply. I know 
of more people who went through similar troubles, so I wouldn't 
recommend to anybody to order anything from Palo Alto. Then 
after two months of using the machine, suddenly the tape drive 
could not read any labels on the pre-recorded cassettes. I had 
to wait 7 weeks for a new tape drive and when it finally arrived, 
I found out, I could not read any of my old programs, because of 
the incompability problems between the two tape drives. 

The COMMODOEE response time is really, really slow. I 
sent two programs to Palo Alto for sale and it took them nearly 
four months to evaluate them and get in touch with me. 

Soon COMMODOEE BUSIMESS mCHIlES IIC. is going to distribute 
the application software and various games on pre-recorded 
cassettes. The programs will be sold as packages of two or more 
programs on one cassette and the estimated price will be $10-20 
per cassette. There will be approximately 75 programs in the 
first release. 

K3OTD PROBLEMS: 

1. Array addressing problems (0-255 size limit) 

2. Arithmetic errors (in some cases .000001 error) 
5. SPC(O) results in SPC(256) 

4. Empty input (simple depression of EETUEN-key) terminates 
the program. This can be handy sometimes, if you want to 
get out of the program at any prompt command, but in other 
instances it can be a nuisance and you have to restart the , 
program. 

5. BACK SPACE - very unfortunate design of this key. 

You have to depress SHIFT and CUESOE, which requires 2 fingers 
(if you are backspacing after one quote, you have to depress 
the quote again in order to switch off the reverse mode) . 



- 3 - 

PLUS: 

Compactness - GET, processor, keyboard, tape drive in one unit 

Price - trie best price /performance ratio on the microcomputer 
market today 

Speed - verj fast and powerful BASIC 

Graphics - verj good graphic capabilities 

PET USE,ES GBDUP' 



MimJS: 

Keyboard - too small and inconvenient for entering of 

lengthy programs 

Tape drive - not very reliable, 

not the best compability with other PET drives 

locumentation- not sufficient 

Software bugs- as described above. 

Comment: Prom Commodore (Canada) 

1. Repairs and servicing are now available at C.B.M. , 3570 
Pharmacy Avenue, Agincourt, Ontario. 

2. Better documentation is being published in later editions 
of this Bulletin. 

3. A PET with a large keyboard will be available in 1979. 



READV. 

^1 OPENS , 4 ; CMD5 

2 PRINTCHR-|(26) -.PR INTCHRf <7) :PR INTCHRf <7> 

18 DIHA$';?5) ,B-|(75) 

26 FOR I =81074 

38 READ A f( I) ..Bf U) 

48 NEXT 

56 PRiNT"L.THIS PROGRAM WILL TEST VOUR KNOWLEDGE OF WORLD CAPITAL CITIES." 

68 PR INT: PR I NT '.PR INT "AFTER EACH STATE (SELECTED AT RANDOM)" 

65 PRINT"PLEASE TYPE IN THE APPROPRIATE CAPITAL FOLLOWED BV A --RETURN -■. " 

88 PRINT -.PRINT 

98 N=0;C=8;W=e 

180 N=N+1: IFN>18THEN488 

105 I=74-*RND( 6) 

106 I=INT(I) 
108 0—8 

110 PRINT -.PRINT: PR IN T"WHAT IS THE CAPITAL OF " .;Af(l); 

115 PRINT: INPUTZ* 

■120 IFZ-|=B-|(I)THEN28e 

138 PR I N T "NO T CORREC I ! . . . TR V AGA I N " : W=M + 1 

-148 0=0 + 1: IFO>=2THEN800 

150 '30 TO 110 

2i0 R=4#RND< i) :C=C-H 

281 R=INT(R> 

210 IFR=lTHEN-388 

228 IFR=2THEN3ei 

236 IFR=3THEN382 

246 IFR=4THEN3e3 

258 PR INT" CORREC T . . VOU '' RE A <3EN I US ! " : CO TO 188 

■388 PRINT"Ri'3HT ON.. BAB V ! " : GOTOlSe 

36 1 PR I N T " ALL R I >3H T ! i " : '30 1 180 

302 PR I N T ■• VES S I R ! ! " : CO TO 168 

383 PR INT" VOU -'RE TOO MUCH ! " :'30T0ie8 

480 PR I N T "L. VOUR SCORE I S " .; C .: " CORREC T .. " ; W .; " WRONG " 

401 PR I N T : PR I N T " Rft T I N>3 " .; C..-' < C +W ) » 188 .: " % " 

402 PRINT :PRINT:pRiNT"l)0 VOU WISH TO CONTINUE THE LESSON CTVPE VES OR NO)? 

483 INPUTC-I 

484 IFC-*="VES"THEN98 

485 IFC*="N0"THENS3e 

486 '30T0482 

6ee DATAAF6HAN ISTAN , KABUL .. ANGOLA .. LUANDA .. ALGER lA , ALG lERS , ARGENT INA > BUENOS A IRES 

610 DATAftUSTRAL lA .. CANBERRA .. AUSTR lA .. V lENNA , BELG lUM , BRUSSELS , BOL IV 1 A ..SUCRE 

620 DATABRAZ IL .. BRAS IL I A .. BULGAR I A , SOF I A .. BURMA .. RANGOON , CAMBOD I A .. PHNOM PENH 

638 DA TACANADA , T TAMA .. CH I LE .. SANT I AGO . COLUMB I A , BOGO TA .. COS T A R i CA .. SAN .JOSE 

648 DA TACUBA .. HAVANA .. C VPRUS .. N I COS I A . CZECHOSLOVAK I A .. PRAGUE > DENMARK , COPENHAGEN 

658 DATADOM IN ICAN REPUBL IC .. SANTO DOM INGO .. ECUADOR , OU I TO , EG VPT , CA IRO 

668 DATAEL SALVADOR. SAN SALVADOR^ETHIOPIA , ADDIS ABABA,FINLAND ..HELS INKI 

670 DATAFRANCE , PAR IS .. W . GERMANV , BONN , E . GERMANV .. BERL IN , GREECE ..ATHENS 

680 DATAGUATEMALA , GUATEMALA C I TV .. GUVANA .. GEORGEROWN , HA I T I .. PORT-AU-PR INCE 

698 DATAHONDURAS .. TEGUC IGALPA .. HUNGARV .. BUDAPEST .. ICELAND ..REVKJAV IK 

780 DATftlNDIA,NEW DELHI .. IRAN > TEHRAN,. IRAO .. BAGHDAD.. IRELAND , DUBLIN 

710 DATA ISRAEL , JERUSALEM .. I TALV , ROME , JAMA ICA , K iNGSTON > JAPAN , lOK VO , JORDAN .. AMMAN 

720 DATAKENVA , NA IROB I , LEBANON ..BE IRUT .. L lECHTENSTE IN > VADUZ .. LUKEMBOURG .. LUKEMBOURG 

730 DATAMALTA , VALLET TA , MEK ICO , MEK ICO C I T V , MOROCCO .. RABAT ,. NETHERlAND .. AMSTERDAM 

746 DA TANEH ZEALAND .. WELL INGTON > N ICARAGUA , MANAGUA , N IGER 1 A , LAGOS .. NoRWA V , OSLO 

758 DATAPARAGUAV , ASUNC ION , PERU , L IMA , POLAND .. WARSAW , PORTUGAL , L ISBON , SPA IN , MADK ID 

760 BATASUDAN .. KHARTOUM , SWEDEN ..STOCKHOLM .. SW I TZERLAND .. BERN .. SVR IH , DAMASCUS 

770 DATATHA ILAND .. BANGKOK .. TURKEV , ANKARA .. UGANDA . KAMPALA .. USSR .. MOSCOW .. USA , WASH iNG I 

N 

780 DA T AU . K . .. LONDON , URUGUA V , HON TEV I DEO .. VENEZUELA , CARACAS . VUGOSL AV I A , B tLCKHD t 

880 PRINT"L-.WELL,. I GUESS VOU REALLV DON -'T 'KNOW IT!! (SHAME)" • 

810 PRINT:PRINT:PRINT"THE CORRECT ANSWER IS •- " .:B$ (I ) .: " ■- 

815 PRINT: PR I NT "NOW I WILL ASK VOU AGAIN!" 

320 GO TO 188 

838 END 

READV. 
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THE PET QRAPHICS 
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This is the PET 2828 PRINTER. 



A -fast J intelligent Peripheral designed to attach to any 
IEEE-438 deuice, in Part icular, the PET 2881 PERSONAL COHPUTER. 
It uses a 7 rieedle Invact printer able to print through 3 copies. 
Runriins at a speed of 128 c»s» erintina lines up to 88 , characters 
in length. 

It features UPPER- lower case^^^O^^I^BSB^nB^na^Sl^raB. 
OR, Bc5 lcl> fully formatted printing. 

THE SEL-L-INO PRICE IS ^^^S 

All this is irfiPlemented by usins a Cororfc<dore 658i series 
Microprocessor. 2 6532 RAH- I/O chips and a 32-K ROM. 

The kyct lcl# ^^^^^^Bl^WI and lower case are all accor»lished 
by, up-shift^ down-shift or control characters which are programmable 
from PET BASIC. 

The full PET graphics set is auailable in an 8H7 dot matrix 
form allowing cotiriuous sraiohics. 

Of course it cej^ also list PET prosr-arns. 

le PRmi"U' 

28 INPUT"NUHBER";A 

38 FOR 1=2 TO SQR(A)+1 

40 IF <ft/I) = INT(A/I> THEN PRINT A" IS NOT PRIME" ;GOTO 28 

56 NEKT 

68 PRINT A; "IS PRIME" 

70 'SOTO 2e 

The PET 2628 PRINTER has full forroatt ins capability al lowing 

SUPPRESSED LEADING ZEROS 9.45 

FORCED LEADING ZEROS 0899.45 

FLOATING DOLLAR SIGN $595.88 

FIXED DOLLAR SIGN $ 595.88 
OR ALPHANUMERIC 

AN EKAMPLE FORMAT MI'SHT BE 

HHHAAAA 999 $■!$$. 99 

WHICH MOULD FORMAT DATA LIKE THIS 

ORANGES 25 t4.45 



ERROR 
RtADV. 

1 REM««»««S'3UIG6LE VERSION 2.8t«»«» 

2 REM IDEA BV PAUL HIITLE 

3 RtH PROGRAMMING BV B.SEILER, G.¥OB 

4 REM CLEAR SCREEN TO START 

5 PRINT"L7'; 

9 RkM SmimtE GRAPHICS CHARACTERS 
18 DATA" I " , "-» , "J •' , » »-» , » r" , "•% •' 

18 RtM CHARACTERS FOR EACH DIRECTION 

19 REH 28-UP.38-I)0MI1,48-RI6HT,5e-LEFT 
28 DATftl.e.5.6 

38 I)ATft8.1,4.3 
48 Dftlh3.6.2.0 
5i DATA4<5 .e.2 

55 REM #^« HOLDS CHARS, B HOLDS PTRS 

56 REH FUR EACH DIRECTION 
68 DIMAf (5) .B':5,5) 

65 REM SET UP Af AND BO 
78 FOR 1=8 1 05 
88 REftDAKI) 
98 NEK! I 

lie f-apj=iro4 

120 RtftDBCJ . i J 

130 NtKT J 

14e NEKT I 

l^a RfcM INIIIHL VALUES 

168 REM 11.T2 = DIRECTION OF TRAVEL 

161 REM 11 IS CURRENT DIRECTION 

162 REM 12 IS PREyiOUS DIRECTION 

163 REM i=UP> 2=I)0HN, 3=RI'3HT, 4=LEFT 
1?0 REM 

ISe REH X,V ARE POSITION OF WRISCCER 

181 REM ON SCREEN. 8,8 IS UPPER LEFT 

182 REM CORNER (CURSOR HOME) 

183 REM 28,12 IS CENTER OF SCREEN 
198 11=1 

280 12=1 
2ie X=28 
228 V=12 



Hth >-6L\ R H N li M F H C 1 R 

Pk 1 N I " W i GGLE F AC 1 OR < ti~H ) " ; 

PR 1 NT "ill" ; : FOR ,J = 1 1 130 : NEK T J 

PR INT" 11" ; : FOR J= 1 TO 108 : NEK T J 

•3tT W$ : IFWf=""THEN265 

IF W$C"0" OR U$ >"9" IHEN 2*^8 

W=VAL(WI)/iW+. 1 

PR1NT"L."; 

ktM**#MHlN LOOP*** 

REM #* TURN Ok NO ■[■-'•-■ 

II- RNr)(i;'>W*W IHLN 325 

REM VES.. DO TURN 

li=4«RND<l) +1 

IhB';Tl,T2)=eiHEN31ti 

REM DRAW MOVE ON SCREEN 

(iOsuBseee 

T2=Ti 

REH UPDHTE POS 11 ION 

ON T 1'30 TO408 , 4 18 ,428 , 438 



2">ti 
2btl 
2b t> 

266 
Z?& 
2Vt> 
238 
29fel 
3Wt! 
301 
3tib 
3Mb 

31 a 

328 
324 
325 
330 
33y 
34 ti 
4titi 

4ibi v='T* + i 

42« K=K + i 



V=V-i 



43fei 
430 

50W 
&10 
5t>fci 

56a 
s>?a 

1390 
1331 
20biW 
381(3 
2620 
283bi 
2bi4M 
2M5a 
2 a 5 5 



•3OTO5tl0 
G0T05Mti 

301 055 W 



H=K-1 ;'3OTO550 

REM ADJUST FOR WRhP-HROUNi:' 

IF VC1THENV=23 :'30T038W 

IF V>23THENV=1 

IF-H<1THENK = 33 

IFK>39THENK=1 

GO 10300 
REH ***DRhWING SUBROUl INE*** 
REH POSiliON CUR30R Hi K,V 
PRirff"«" ; 



■ 3OTO30W 
;3OTO380 

■ yOTOSfclB 



F OR 1 = 1 TO V 
PRiNT"»l"; 
NEXT I 
h0Ri=lT0K 
PR INT "W" ; 
NtKl 1 
2tlA»3 Rtr-1 PRINT 
2t!yM HK IN lh$(B 
2fciyti Rt lUt-tl 
ktHDV. 



THE CHHRH'; 
1 m 2 ) - 1 ) 



TER 



READY. 



REHi)V. 

10 REM BI'3 TIME 2.8 NON-STOP 

lt> REM ORIGINALLY BV SCOTT MftUCIJS 

16 RtH HODIFIEls BV B. SEILER 

26 DIM AfO) 

36 FOR !=e TO 9 

35 REM SET UP A DISIT 

40 FOR J=i TO 5 

50 REAB At 

55 REM HOVE CURSOR DOWN 8, 3 LEFT 

be H f < I ) =« $<!)+«$ + "!■■■" 

?e NEKT J 

80 REfiD Af 

85 REM MOVE CURSOR RI'3HT & 5 UP 

90 A f ( I ) =H ■$ .;• I 'J 4-ft f + "»mm" 

lee NEKi 1 

198 REM ASK FOR TIME 

200 PPINT"L. MINUTES" 

22e PRINT" HOURS— 1 I i SECONDS" 

249 PRINT" til" 

260 PRINT " PLEASE I NPU T T I HE HHMMSS " : PR I N TSPC < 17 ) 

388 INPUTAf 

34€i REM SET TIME HERE 

350 TIf=AI 

3be REM DRAW '"TIME" WOPE* 

3 7 S U B 8 M £i 6 

398 REM PRAW HORfCR fcOK 

400 'j'''SIJBjtf0W 

49W PtM HA in L'.."P 

4"?': FtM FOslil'^fi 'JJPSOR * 1 S1 E'lcBIT 

^,fcifci pp I fj ( "^vmm»w^^fmw^^i" ; 

•r-ye PtH LRmW riUMfcPriLS FOR TIME 

680 FORI=1T06 

650 PR I N TA f i VAL ( M I D f •; T 1 f ^ I , 1 > ) ■• ; 

660 REM INSERT COLON TWEEN HH-HH 01f1-SS 

670 I F I = 2 R 1 = 4 "r H E N P R i N T " W0iW»»10 WITI V ; 

766 NEXT I 

8ie '30 T 0500 



990 REM DIGITS DATA STRINGS 

leee data"/~"'\" 

leie DATA"! I" 

1620 DAfft"! I" 

1830 DATA"! I" 

1648 DHlH"! I" 

lese i>HTA"\_/" 

1106 DATA" /'! " 



11 le 


DHIA" 




1120 


DATA" 




1130 


dhth" 




1140 


DATA" 




1150 


DATA" 




1200 


DATA"..- 


/ — .^.^ 11 


1210 


DATA" 


1" 


i22e 


DATA" 


/ 


1230 


DATA",.- 




1240 


DATA"I 




1250 


I>ATA"L 




1300 


DATA".- 


/ — "\^ H 


1310 


DATA" 


1" 


1328 


DATA" 


_.■'■■" 


1330 


DATA" 


■\ " 


1340 


DATA" 


1 


13543 


DATA"' 


"\ / *' 


1406 


DATA"! 


1 " 


1418 


DATH"I 


t " 


1420 


DATH"I 


1 " 


1430 


DATA" 


T" 


1440 


DATA" 


1 " 


1450 


DATH" 


1 " 


1500 


DATA"r -^■" 



1518 DHTri"L_ " 

1520 I'Hrri" 

15 d0 D^lri" I" 

1548 Dt^lH" I" 

15S M !"-• 1 rt "■■■•■,.,.,/" 

ItHM DATH"/-"\" 

1618 DATH"1 

1620 DATA"! " 

1630 DATA "I \" 

1640 DATA"! 1" 

1658 DATA"\_/" 

1700 r.HTA"t"^l" 

1718 DhTA" /" 

1720 DAlA" ,-■• " 

173M DHlM" I " 

1740 DATA" t " 

1750 DhTA" ! 

18 ee DH T A "..'■■ "■■■., " 

1810 DATA"! I" 

1820 DH1A"\^."" 

1830 DATA".--- \" 

1840 DATA "I i" 

1850 DATA"\^/" 

190e DA1A"/^''"\" 

19ie DATA"! I" 

1920 DATA"\ !" 

1930 DATA" I" 

1948 DATA" t" 

195e DA1A"\_/" 



4999 REM WRITE BORDER FOR DIGITS 

5886 PRINT" "; 

5810 FORI = 1T037;PRINT"_" ; :NEXT '.PRINT 

5620 PR I N T " t\" SPC ( 35 ) "/I " 

5040 F0RI=1T02 

5850 PRINT" r'SPCf. I) "''"SP':":C:-f=;-2*r) "/"SP""-'' r> "I " 

5666 NEKT 

5670 PRINT" I F" ; ; FOR 1 = 11 029 : PR I N T "■^" : : NEK T ■ PR I N T "'l I " 

5100 F0RI=1T08 

5118 PRINT" I I "SPC<29-)" | | " 

5120 NEKT 

5280 PRINT" I L" ; :F0RI = 1I029-PRINT"_".; ;NEKT:PPINT"J ! " 

5340 F0RI=2T01STEP-1 

5350 PRINT" l"SPC< Is "/"qpr.-q5-2*i'» "^"•=;pr.' I) "i " 

5368 NEKT 

5420 PRINT" l/"SPC<35) "^J " 

5510 PR INT" " ; : FOR I = 1T03? : PR INT"'"""" .; : NEXT ; PR INT 

68ee RETURN 

8808 REH TIHE HEADER 

8030 PR INT "L."; 

8840 w=ie 

3058 PRINTSPCCH)" — I — "T !\ /I ! 

8060 PR I NT SPC (W) "I I I \/ 1 
8870 PRINTSPC<W)" III! 
8680 PRINTSPC(W)" I J_ I i 
9080 RETURN 
REhDV. 
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Just Released 
HIGH SPEED PRINTER 
ACCiSSOBY 



F««tuping an 
iEEE-488 BUS 



The Commodore PET -- Its technology is so advanced; its concept, so 
remarkable; its ease of operation, so utterly simple, and its cost so incredibly low, that over- 
night it has given rise to a brand new era -- The Age of the Personal Computer. 



THE PET has become the standard for the 
emerging personal computer industry. 
Computer magazines, trade journals, con- 
sumer and business publications have 
lauded its discovery. POPULAR SCIENCE 
put THE PET on its October, 1977 cover, in 
full color, and devoted a feature news story 
to the coming revolution in personal and 
office computing, PLAYBOY. February. 
1978, gave full color coverage to the "mind- 
boggling" PET, 

IN A LEAGUE WITH IBM, HP 
AND WANG MINICOMPUTERS 
THE PET should not be confused with game 
products that hook up to household T.V.'s. it 
is a minicomputer. What sets THE PET light 
years apart from other computers is its 
price. White the others cost from $1 l.CXWto 
$20,000 and more. THE PET, with similar 
capabilities and |»wer, costs only SI, 200. 
One extremely important capability shared 
with HP's minicomputer, and full size com- 
puters, is its IEEE-488 Bus. This standard 
clata,'control channel means your PET can 
be directly connected to a variety of 
peripherals and laboratory measuring 



equipment. Over 120 pieces of compatible 
equipment such as counters, timers, spec- 
trum analyzers, digital voltmeters and 
printer plotters from manufacturers such 
as HP. Phillips, Fluke, and Textronix are 
currently available. 

ROM Magazine, January 1978, vi^rites, 
"THE PET comes out of the box, plugs 
into the wall, and is ready to use." It is 
equipped with a CRT video display with 
reverse and blink features, an alpha- 
numeric keyboard with complete graphics 
and a built-in standard cassette tape deck. 
THE PET is an exceptionally powerful think 
tank with 8K bytes of RAM (User Memory). 
Optional equipment, permits expansion to 
32K. The system contains 14K bytes of 
ROM (Program Memory). 

THE PET COMMUNICATES IN THE 
EASIEST COMPUTER LANGUAGE 
Computers talk in many languages. The 
easiest is BASIC or English-like words. If 
THE PET wants you to press a key, it will 
flash, "Press such and such", right on the 
display. You speak back to THE PET 
through its full size 73-key keyboard. 



EXTENSIVE CHARACTER 
ORIENTED GRAPHICS 
The unit features a 9-inch, high resolution, 
1000 character CRT, Characters are ar- 
ranged 40 columns by 25 lines on an 8 x 8 
matrix for superb graphics. 
WHAT IS THE PET REALLY FOR? 
It is the single most important teaching 
device for any computer related subject. It 
can help a youngster learn number facts, or 
help a med student do tissue analyses. It 
will entertain the most sophisticated data 
application, or the simplest inquiry- 
response assignment. 
IN THE LAB it handles instrumentation, 
process monitoring, computer aided in- 
structions, and more. A number of Fortune 
500 companies have already made PETS an 
integral part of their lab and general 
office system. 

As a BUSINESS TOOL it will; Maintain 
ledgers. Illustrate cash flow charts. Keep 
payroll records. Create P & L's, Control in- 
ventory. Store and analyze sales data. Draw 
bar graphs. Issue invoices. Do statistical 
work. Hook up to on-line computer system. 



THE PET is the only totally intefrated, 
self-contained, personal computing system. 
It measyres a compact 16%'' wide; 18^2" deep; 
14" high, and weighs just 44 pounds. 




AmortiMtion Chart 



As an AT-HOME TOOL it will; Compute 
state and federal tax returns. Make heat 
and insulation analyses. Keep Christmas 
lists. Keep checkbook and finances up to 
date. Programs are even being developed 
to store recipes and to compute larger or 
smaller portion requirements. 

WHO IS THE PET FOR? 
Engineers, scientists, doctors, educators, 
students of computer science, attorneys, 
stock brokers, realtors, insurance people, 
list brokers, home economists, churches, 
grocery store owners, automobile dealers, 
sales people, organizations. 

JUST FOR FUN 

There is hardly a game, from Blackjack to 
Master Chess, that cannot be programmed 
into the unit. A variety of game programs is 
currently available. 
ANNOUNCING THE PET PRINTER 
This powerful word processing accessory 
lets you print hardcopies, invoices, and com- 
puter correspondence. Faster than an IBM 
Setectric. THE PET Printer delivers 60 
characters per second at a sustained rate -- 
or 3,600 characters every minute -- with 
upper and lower case capability. Characters 
are l./g" tall and printed in a 7 x 8 dot 
matrix. The printer uses a standard SV?" 
wide paoer roll. And, most unbelievable -- it 
is only $850.00. 

PERIPHERAL SECOND CASSETTE 

This optional component expands storage 

and increases flexibility. Only S13O.O0. 



MILES OF SOFTWARE 
Listed below is a sampling of currently 
available PET programs. "BASIC BASiC'' 
shows you how to write a program for the 
unit. You can actually develop your own 
programs to meet personal requirements. 



GAME PROGRAMS ARE $11.00 EACH 
■iBIackJKk Dft-swPsliw CI C5Ai» 
. I Space FIfIrt u Tirgtt fcnj. OH-Th#-W»l 
f : Lynar Lander, Wumpus, Rotate, TK-Tss-Tot 
. Osero, Revwse . .: Suacetretc n "' ' 
PROGRAMS AT $16.00 EACH 



Msrtgtge Analysis : ^ Diet I 
1 I Basic Ba»fc-by Lodewyck and James 
PROGRAMS AT $27.00 EACH 
G Basic Investmgnt Analysis-loans, annuities, return on 
regular arid irregular sequences of payments, calendar 
calculations !. I Stock Psrttois Recordkeeping 'and 
fm^him-kmpi track of buys, sells, and dividends. 
Calcutates current value, rates of return ;:iChecl(b«* 
Recorthsepifif »ml Analysis-keeps track of checks and 
deposits. Analyzes expenses by date and type 
PROGRAMS AT $32.0© EACH 
. Basic mm> Package-matrix addition, multiplication, 
determinants and inverses to 16 x 16, solution of 
simultaneous linear equations, vector and plane geometry 
calculations, integration by trapezoidal, Simpson s rule or 
Gaussian quadrature, differentiation 
: ' Basic Statistics Psclage-mean, median, variance, 
stsrtdard devwtion, skewness, kurtosis, frequency distri- 
bution, ll»«ar regression, T-tests, correlation analyses 



FREE ORIENTATION PACKAGE 
Your PET comes complete with two pro- 
grams and an easy-to-follow instruction 
manual. By working through the routines 
you will quickly discover how easy it is to 
gain command of your personal computer. 



TECHNICAL SPECIFICATIONS 



MEMORY 

Random tec»ss Mmmry (user memory); 8K internal, 

expandable to 32K Wss 
R«ad On% Memorj (operating system rssident in the 

compyter); 14K bytes 

8K -BASIC interpreter program 

4K -Operating system 

lK-Oii|nostic routine 

VIDEO DISPLAY yNIT 

9- enclosed, black * white, high resolution CRT 

1000 character display, arranged 40 columns by 25 lines 

8 X 8 dot matrix for characters and continuous graphics 

Automatic scrolling from bottom of screen 

Winking cursor with full motion control 

Reverse field on all characters (white m black 

black on while) 
64 standard ASCII characters; 64 graphic ctiaracters 
KEYBOARD 

SW" widexS" deep; 73 toys 
All 64 ASCII characters available without shift. 

Calculator style numeric toy pad 
All_ 64 grapliic and revsrsa K#ld characters accessible 
(with sf^ift) 



Cassette driv« modifttd by Commodors for much higher 

relability of recording and rtcorcJ rettntion 
High noise immunity, error detection, and correction 
Us«s standard aydio cassette tapes 



OPERATING SYSTEM 

Supports multipte toriguaps {BASIC resident) 

Machine language atetssibility 

Fil€ management in op»r»ting system 

Cursor control, revgrs* field, and graphics under 

simple BASIC control 
Cassette file management from BASIC 
True random number generation or pseudo 

rgndom £#t|U6nc0 

mpmiompm 

All sttttr I/O supported througtt IEEE-488 instrument 



it®ff@c® f©r Mfipt^frals 
I/O automatically managwJ by operating system software 
- ■ ■ VO with GET c 



Single ctiaraeter I/O 
Easy scrtsn line-«iit capability 
FtaibI* I/O structure for BASIC 9«p»nsion 
with p®ripli0f@ls 



Eatinf ; Ctiaraeter insertion and deletion 
CASSETTE STORAGE 

Fast Commodore designed redundant-recording scheme, 
assuring reliable data recovery 



m BASIC: m% fastw than most «h«r W BASICS 
Upward eKpansioR frcKn BASIC l»n|u»it 
Strings, integtrs, myltiple dimension arrays 
10 si^nificint digits; flMtsns point 
Dtr»ct mtmory acc0ss: PEEK and TORE commands 
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COMMODORE BUSINESS MACHINES LIMITED 
3370 PHARMACY AVENUE. AGINCOURT, ONTARIO M1W 2K4 
TELEPHONE !416) 499-4292 - CABLE ADDRESS: COMTYPE 
TELEX NUMBER 06-525400 



